type angle = int
type speed = float
type vector = Vec of angle * speed;;
type point = Pt of float*float;; 

val center : vector
val point_of_vector : vector  -> point
